home *** CD-ROM | disk | FTP | other *** search
/ AGA Toolkit '97 / The AGA Toolkit '97.iso / programming / e / ee / rexx / dwindow.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1996-09-07  |  278 b   |  17 lines
  1. /* Dwindow.rexx - SAY EE window dimensions. */
  2.  
  3. ADDRESS 'EE.0'
  4. OPTIONS RESULTS
  5.  
  6. LockWindow
  7. ?WindowDimensions; wd=RESULT
  8.  
  9. PARSE VALUE wd WITH leftedge topedge width height .
  10.  
  11. SAY "leftedge="leftedge
  12. SAY "topedge ="topedge
  13. SAY "width   ="width
  14. SAY "height  ="height
  15.  
  16. UnlockWindow
  17.